/* 最大流之最大权闭合图
* 1.闭合子图    
    闭合子图（本质上是一个点集）：对于一个图 G(V,E)，找到图中的某个点集，这个点集满足 不存在点集中的某个点指向除点集以外的其他点的边
    最大权闭合子图：即闭合子图权值最大的子图

* 2.点权图转流网络
    对于一个含有点权的图，考虑转化为流网络，
    建立源点s，汇点t，s向所有权值为正的点连边，容量为点权，所有点权为负的点向t连边，容量为点权的相反数，
    其余点之间按原图连边，容量足够大

* 3.简单割[S, T]
    S和T之间的边不含容量足够大的边。显然，最小割一定是简单割：由最小割最大流定理，最小割=最大流
    由可行流的定理，由s出去的边肯定没有容量足够大的边，故最小割一定是简单割
    -> 流网络中的简单割和原图中的闭合子图一一对应
    -> 对于原图上的任意一个闭合子图都可以对应流网络上的一个简单割
       对于流网络上的任意一个简单割都可以对应原图上的一个闭合子图

* 本题:
    本题为所有正点减去与之相关的负点，
    建图：建立源点s和汇点t，源点向所有点权为正的点连边，容量为点权，所有点权为负的点向 t 连边，容量为点权的相反数，
    选择一定点权为正的点，需向两个点权为负的点两边，容量足够大，这样可以对应上一个闭合图
*/

#define DEBUG
#pragma GCC optimize("O1,O2,O3,Ofast")
#pragma GCC optimize("no-stack-protector,unroll-loops,fast-math,inline")
#pragma GCC target("avx,avx2,fma")
#pragma GCC target("sse,sse2,sse3,sse4,sse4.1,sse4.2,ssse3")

#include <iostream>
#include <cstring>
using namespace std;

const int N = 55010, M = (50000*3 + 5000)*2 + 10, INF = 0x3f3f3f3f;  
int n, m, S, T;
int e[M], h[N], c[M], ne[M], idx;
int q[N], d[N], cur[N];

void AddEdge(int a, int b, int w)
{
    e[idx] = b, c[idx] = w, ne[idx] = h[a], h[a] = idx++;
    e[idx] = a, c[idx] = 0, ne[idx] = h[b], h[b] = idx++;
}

bool bfs()
{
    memset(d, -1, sizeof d);
    int hh = 0, tt = -1;
    q[++tt] = S, d[S] = 0, cur[S] = h[S];
    while(hh <= tt)
    {
        int u = q[hh++];
        for(int i=h[u]; ~i; i=ne[i])
        {
            int v = e[i];
            if(d[v] == -1 && c[i])
            {
                d[v] = d[u]+1;
                cur[v] = h[v];
                if(v == T) return true;
                q[++tt] = v;
            }
        }
    }
    return false;
}

int find(int u, int limit)
{
    if(u == T) return limit;

    int flow = 0;
    for(int i=cur[u]; ~i && flow < limit; cur[u]=i, i=ne[i])
    {
        int v = e[i];
        if(d[v] == d[u]+1 && c[i])
        {
            int t = find(v, min(limit-flow, c[i]));
            if(!t) d[v] = -1;
            c[i] -= t; c[i^1] += t, flow += t;
        }
    }
    return flow;

}

int Dinic()
{
    int r = 0, flow;
    while(bfs())
        while(flow = find(S, INF)) r += flow;
    return r;
}

signed main()
{
    #ifdef DEBUG
        freopen("./in.txt", "r", stdin);
    #else
        ios::sync_with_stdio(0); cin.tie(0); cout.tie(0);
    #endif

    memset(h, -1, sizeof h);
    cin >> n >> m;
    S = 0, T = n+m+1;

    for(int i=1; i<=n; i++)
    {
        int p; cin >> p; //基站建设成本
        AddEdge(m+i, T, p);
    }

    int tot = 0;
    for(int i=1; i<=m; i++) //第i个用户
    {
        int a, b, c; cin >> a >> b >> c;
        AddEdge(S, i, c);
        AddEdge(i, m+a, INF);
        AddEdge(i, m+b, INF);
        tot += c;
    }
    printf("%d\n", tot - Dinic());
    return 0;
}